home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 001a / boymks5e.zip / MAKEMAIL.BSC < prev    next >
Text File  |  1991-12-16  |  22KB  |  444 lines
  1. \\
  2. \\  Make mail script by Lee Breeden for PCBoard systems
  3. \\
  4. \\  This script is used to make a mail script for calling a pcboard and
  5. \\  downloading mail unattended, uplaoding or downloading files.
  6. \\
  7.  
  8. |logon
  9. \ko[245]
  10. \svv[]\SVS[]\sv0[]\sv1[]\sv2[]\sv3[]\sv4[]\sv5[]\sv6[]\sv7[]\sv8[]\sv9[]\svh[]\lvs[]
  11. \svz[]\svy[]
  12. |Script
  13. \bl[start]
  14. \bl[make]
  15. \bl[append4]
  16. \bl[editit]
  17. \eb
  18.  
  19. |more
  20. \svv[]\SVS[]\sv0[]\sv1[]\sv2[]\sv3[]\sv4[]\sv5[]\sv6[]\sv7[]\sv8[]\sv9[]\svh[]\lvs[]
  21. \svz[]\svy[]
  22. \bl[continue]
  23. \bl[make]
  24. \bl[append4]
  25. \bl[editit]
  26. \eb
  27.  
  28.  
  29. |start
  30. \zs
  31. \dm8,1[                                                                     ]
  32. \dm8,2[  ╔════════════════════════════════════════════════════════════════╗ ]
  33. \dm8,3[  ║ Boyan 5.0 script generator. This will not work with 4.1 or 3.0 ║ ]
  34. \dm8,4[  ║      Welcome: This is a Boyan Script that will walk you        ║ ]
  35. \dm8,5[  ║    thru setting up a mail or regular script. The information   ║ ]
  36. \dm8,6[  ║    that you will be asked is used in the bbs system script.    ║ ]
  37. \dm8,7[  ║      There are some things that you must have handy before     ║ ]
  38. \dm8,8[  ║      going any further.                                        ║ ]
  39. \dm8,9[  ║                                                                ║ ]
  40. \dm8,10[  ║                   Mail door number                             ║ ]
  41. \dm8,11[  ║                   ProDoor number                               ║ ]
  42. \dm8,12[  ║                   Mail Packet name  *.qwk                      ║ ]
  43. \dm8,13[  ║                   Type of door that you are going to           ║ ]
  44. \dm8,14[  ║                       enter to get your mail.                  ║ ]
  45. \dm8,15[  ║                                                                ║ ]
  46. \dm8,16[  ║     There are some commands that will be set for you that      ║ ]
  47. \dm8,17[  ║     you can edit later.                                        ║ ]
  48. \dm8,18[  ║                                                                ║ ]
  49. \dm8,19[  ║     If you don't have all of the above handy then HIT ESC      ║ ]
  50. \dm8,20[  ║                         NOW!                                   ║ ]
  51. \dm8,21[  ║                                                                ║ ]
  52. \dm8,22[  ╚════════════════════════════════════════════════════════════════╝ ]
  53. \dm8,23[                                                                     ]
  54. \kv0[ Hit enter to continue ESC to escape> ]
  55. \zs
  56. \gb[name]
  57.  
  58. |name
  59. \MVZ[111]\MVY[112]
  60. \ie+%vz, [\kv0[Enter your first name> `]]
  61. \ie+%vz, [\sv1[%V0 "`]\SM111[%V1]]
  62. \ie+%vy, [\kv0[Enter your last name> `]]
  63. \ie+%vz, [\SM112[%v0]]
  64. \ie-%vz, [\bl[dispname]]
  65. \ie+%pw, [\bl[password]]
  66. \gb[continue]
  67.  
  68.  
  69. |password
  70. \dm6,10[ ╔══════════════════════════════════════╗
  71. \dm6,11[ ║   Currently you don't have a         ║
  72. \dm6,12[ ║   default password defined. So lets  ║
  73. \dm6,13[ ║   set one now. You will have to      ║
  74. \dm6,14[ ║   select ""P"" from the screen .       ║
  75. \dm6,15[ ║  You can have a different one on     ║
  76. \dm6,16[ ║ every system in your phone directory.║
  77. \dm6,17[ ╚══════════════════════════════════════╝
  78. \kvo[ Hit enter to continue]\SN[ Select "P" for password ]\cb[s]
  79. \zs
  80.  
  81. |dispname
  82. \svx[ %vz %vy ]\lvx[30]
  83. \dm6,10[ ╔══════════════════════════════════════╗
  84. \dm6,11[ ║  This is the way that your name      ║
  85. \dm6,12[ ║  well be used in these scripts.      ║
  86. \dm6,13[ ║  %VX      ║
  87. \dm6,14[ ║  The "" "` "" will not be displayed.    ║
  88. \dm6,15[ ║ If your name is displayed together   ║
  89. \dm6,16[ ║  the mail script will error.         ║
  90. \dm6,17[ ╚══════════════════════════════════════╝
  91. \kv0[Hit enter to continue > `]
  92. \zs
  93.  
  94. |continue
  95. \dm6,7[ ╔═══════════════════════════════════════╗ ]
  96. \dm6,8[ ║          Enter the name for the       ║ ]
  97. \dm6,9[ ║      Script that you would like to    ║ ]
  98. \dm6,10[ ║       create. ie:  BBS name EdsHome   ║ ]
  99. \dm6,11[ ╚═══════════════════════════════════════╝ ]
  100. {
  101. \kvs[Script name > ]\SVT[%vs.bsc]\lvt[12]
  102. \FE+%S:%VS.bsc[\GB[bsc]]
  103. \eb
  104.  
  105. |make
  106. \zs Creating script %S:%VS.bsc {
  107. \AF%S:%VS.bsc["\"\ This script automates Mail runs to PC-BOARD type Bulletin Boards.       ]
  108. \AF%S:%VS.bsc["\"\ You must set the following macros with BOYAN's configuration module:    ]
  109. \AF%S:%VS.bsc["\"\  "\! = Macro # 111 = Your first name                                     ]
  110. \AF%S:%VS.bsc["\"\  "\"@ = Macro # 112 = Your last name                                      ]
  111. \AF%S:%VS.bsc["\"\  "%PW = Is your defined password.                                      ]
  112. \AF%S:%VS.bsc["\"\  "\sv1 used for mail system report file *.rep.                           ]
  113. \AF%S:%VS.bsc["\"\  "\sv2 used for prodoor option number.                                   ]
  114. \AF%S:%VS.bsc["\"\  "\sv3 used for mail door option number.                                 ]
  115. \AF%S:%VS.bsc["\"\  "\sv4 used for mail packet system name *.qwk.                           ]
  116. \AF%S:%VS.bsc["\"\  "\sv5 used for up-file name or names.                                   ]
  117. \AF%S:%VS.bsc["\"\  "\sv6 used for file upload description.                                 ]
  118. \AF%S:%VS.bsc["\"\  "\sv7 used for file upload description, leave blank if not used         ]
  119. \AF%S:%VS.bsc["\"\  "\sv8 used for file upload description, leave blank if not used         ]
  120. \AF%S:%VS.bsc["\"\  "\sv9 used for file upload description, leave blank if not used         ]
  121. \AF%S:%VS.bsc["\"\  "\sv0 used for system name in call back option.                       ]
  122. \AF%S:%VS.bsc["\"\  "\svA used to set option for call back block.                           ]
  123. \AF%S:%VS.bsc["\"\  "\svB used for setting number of mail packets to keep.                  ]
  124. \AF%S:%VS.bsc["\"\  "\svC used for setting file scan option <U>pload <A>ll etc.             ]
  125. \AF%S:%VS.bsc["\"\  "\svD used internally to read variable        ]
  126. \AF%S:%VS.bsc["\"\  "\svE used internally for selection option                              ]
  127. \AF%S:%VS.bsc["\"\  "\svF used for setting cursor position in mail door.                   ]
  128. \AF%S:%VS.bsc["\"\  "\svG used for setting the maximum number of messages in mail door.     ]
  129. \AF%S:%VS.bsc["\"\  "\svD used ALSO for closing file download block.
  130. \AF%S:%VS.bsc["\"\  "\svF used ALSO for closing file scan block.
  131. \AF%S:%VS.bsc["\"\  "\svG used ALSO for closing file MailDL block.
  132. \AF%S:%VS.bsc["\"\  "\svM used for closing Mail block.
  133. \AF%S:%VS.bsc["\"\  "\svQ used for closing Quest block.
  134. \AF%S:%VS.bsc["\"\  "\svS used for closing MailUL block.
  135. \AF%S:%VS.bsc["\"\  "\svU used for closing UL File block.
  136. \AF%S:%VS.bsc["\"\  Need to have in boyan macro #7 \AT+[\qd"]                              ]
  137. \AF%S:%VS.bsc["\"\  as last command.                                                       ]
  138. \AF%S:%VS.bsc["\"\Script assumes that you put your message replies in upload dir.           ]
  139. \AF%S:%VS.bsc["\"\Script assumes that you put your messages packets in DN dir.             ]
  140. \AF%S:%VS.bsc["\"\Script assumes that you use Zmodem configured as Z.                      ]
  141. \AF%S:%VS.bsc[                                                                           ]
  142. \AF%S:%VS.bsc[|LOGON                                    "\"\ Start script blocks    ]
  143. \AF%S:%VS.bsc["\ST"[ » Press <TAB> for Menu options «"]
  144. \AF%S:%VS.bsc["\IE+OFF,"%LD["\LD+"]                         "\"\ Turn on Log to disk file  ]
  145. \AF%S:%VS.bsc["\SVN["]"\SVF["]"\SVG["]"\SVM["]\SVQ["]\SVS["]\SVU["]                      ]
  146. \AF%S:%VS.bsc["\SVY["%SC"] ]
  147.  
  148. \\
  149. \dm12,10[ ╔═══════════════════════════════════════╗ ]
  150. \dm12,11[ ║                                       ║ ]
  151. \dm12,12[ ║          Enter Mail Door #            ║ ]
  152. \dm12,13[ ║                                       ║ ]
  153. \dm12,14[ ╚═══════════════════════════════════════╝ ]
  154. \\{
  155. \KV2[Enter Mail door number> ]
  156. \\dm14,11[ ╔═══════════════════════════════════════╗ ]
  157. \\dm14,12[ ║                                       ║ ]
  158. \\dm14,13[ ║          Enter Mail Door #            ║ ]
  159. \\dm14,14[ ║                                       ║ ]
  160. \\dm14,15[ ╚═══════════════════════════════════════╝ ]
  161. \\{
  162. \\KV3[Enter ProDoor number> ] \AF%S:%VS.bsc["\SV3[%v3"]            "\"\enter prodoor number   ]
  163. \dm16,12[ ╔═══════════════════════════════════════╗ ]
  164. \dm16,13[ ║                                       ║ ]
  165. \dm16,14[ ║     Enter mail packet name            ║ ]
  166. \dm16,15[ ║  EdsHome.qwk   with extension         ║ ]
  167. \dm16,16[ ╚═══════════════════════════════════════╝ ]
  168. {
  169. \Kv4[Enter Mail packet> ]
  170. \dm18,13[ ╔═══════════════════════════════════════╗ ]
  171. \dm18,14[ ║                                       ║ ]
  172. \dm18,15[ ║      Enter Reply name  ie:            ║ ]
  173. \dm18,16[ ║   EdsHome.rep   with entension        ║ ]
  174. \dm18,17[ ╚═══════════════════════════════════════╝ ]
  175. {
  176. \Kv1[Enter Mail packet> ]
  177. \bl[append]
  178.  
  179. \zs
  180. \dm8,1[                                                                     ]
  181. \dm8,2[  ╔════════════════════════════════════════════════════════════════╗ ]
  182. \dm8,3[  ║                                                                ║ ]
  183. \dm8,4[  ║       Which Mail Door do you use for getting the mail?         ║ ]
  184. \dm8,5[  ║                                                                ║ ]
  185. \dm8,6[  ║                   [1"]  MarkMail  Door                          ║ ]
  186. \dm8,7[  ║                                                                ║ ]
  187. \dm8,8[  ║                   [2"]  Qmail Door                              ║ ]
  188. \dm8,9[  ║                                                                ║ ]
  189. \dm8,10[  ║                   [3"]  Kmail Door                              ║ ]
  190. \dm8,11[  ║                                                                ║ ]
  191. \dm8,12[  ║                   [4"]  Megamail Door                           ║ ]
  192. \dm8,13[  ║                                                                ║ ]
  193. \dm8,14[  ║                   [5"]  TomCat  Door                            ║ ]
  194. \dm8,15[  ║                                                                ║ ]
  195. \dm8,16[  ║                   [6"]  RoseMail Door                           ║ ]
  196. \dm8,17[  ║                                                                ║ ]
  197. \dm8,18[  ╚════════════════════════════════════════════════════════════════╝ ]
  198. \dm8,19[                                                                     ]
  199. {
  200. \KV0[Enter door number here> ]
  201.  
  202. \IV0+1[\SVm[MM]\svV[4]\svw[35]]
  203. \IV0+2[\SVm[QM]\svV[4]\svw[35]]
  204. \IV0+3[\SVm[KM]\svv[12]\svw[31]]
  205. \IV0+4[\SVm[MR]\svV[4]\svw[35]]
  206. \IV0+5[\SVm[TM]\svV[4]\svw[35]]
  207. \IV0+6[\SVm[RM]\svV[4]\svw[35]]
  208. \AF%S:%VS.bsc["\SVF[%vw"]            "\"\ Cursor position
  209. \AF%S:%VS.bsc["\SVG[800"]           "\"\ Maximum message counter for mail
  210. \AF%S:%VS.bsc["\SVH[%VV"]            "\"\ Timer to wait for NO messages 2-15 sec
  211. \AF%S:%VS.bsc["\SVI["%SS"]            "\"\ Sets script running to system  name
  212. \AF%S:%VS.bsc["\GB[Menu"]
  213. \AF%S:%VS.bsc[]
  214. \AF%S:%VS.bsc["|Menu]
  215. \bl[append1]
  216. \AF%S:%VS.bsc["\CA+["\SC[SCRIPT;NAME"]"]                    "\"\ Enter name block        ]
  217. \AF%S:%VS.bsc["\ie+"%VA,X["\gs[script;calback"]"\eb"]         "\"\ Checking for errors          ]
  218. \AF%S:%VS.bsc["\CA+["\SC[SCRIPT;QUEST"]"]                   "\"\ Question block        ]
  219. \AF%S:%VS.bsc["\ie+"%VA,X["\gs[script;calback"]"\eb"]         "\"\ Checking for errors          ]
  220. \AF%S:%VS.bsc["\CA+["\FE+"%S:"%VI.dow["\SC[SCRIPT;dowlst"]"]"]        ]
  221. \AF%S:%VS.bsc["\ie+"%VA,X["\gs[script;calback"]"\eb"]         "\"\ Checking for errors          ]
  222.  
  223. \eb
  224.  
  225.  
  226. \zs
  227. \dm20,14[ ╔═══════════════════════════════════════╗ ]
  228. \dm20,15[ ║                                       ║ ]
  229. \dm20,16[ ║         Do you use ProDoor?           ║ ]
  230. \dm20,17[ ║                                       ║ ]
  231. \dm20,18[ ║        [Y"] Yes                        ║ ]
  232. \dm20,19[ ║        [N"] No                         ║ ]
  233. \dm20,20[ ╚═══════════════════════════════════════╝
  234. {
  235. \KV0[Y/N> ]
  236. \IV0+Y[\bl[append3]\EB     \\ If "Y" invoke block edit
  237. \IV0+N[\eb]               \\ If "N" go to "Files" block
  238. \eb
  239.  
  240. |editit
  241. \ZS
  242. \dm6,7[ ╔═══════════════════════════════════════╗ ]
  243. \dm6,8[ ║        Do you wish to edit the        ║ ]
  244. \dm6,9[ ║      %Vt before exiting      ║ ]
  245. \dm6,10[ ║     [Y"]es  [N"]o  [M"]ore               ║ ]
  246. \dm6,11[ ╚═══════════════════════════════════════╝ ]
  247. {
  248. \Kv0[     Y/n> ]
  249. \IV0+Y[\GB[edit]]                   \\ If "Y" invoke block edit
  250. \IV0+N[\GB[end]                   \\ If "D" go to "end" block
  251. \IV0+M[\GB[More]                 \\ If "D" go to "end" block
  252. \eb
  253.  
  254. |bsc
  255. \zs
  256. \dm6,1[ ╔═══════════════════════════════════════╗ ]
  257. \dm6,2[ ║     File %Vt already exist   ║ ]
  258. \dm6,3[ ║     cannot re create it. Must         ║ ]
  259. \dm6,4[ ║     delete it or use editor           ║ ]
  260. \dm6,5[ ╚═══════════════════════════════════════╝ ]
  261. {
  262. \dm6,7[ ╔═══════════════════════════════════════╗ ]
  263. \dm6,8[ ║      Do you wish to edit file         ║ ]
  264. \dm6,9[ ║    [Y"] Yes to edit script %Vt║ ]
  265. \dm6,10[ ║    [A"] Abort script                   ║ ]
  266. \dm6,11[ ║    [D"] to Delete file and continue    ║ ]
  267. \dm6,12[ ╚═══════════════════════════════════════╝ ]
  268. {
  269. \KV0[   Y,A or D > ]
  270. \IV0+Y[\zs\bl[edit]]                \\ If "Y" invoke block edit
  271. \IV0+D[\zs\bl[delete]]               \\ If "D" go to "Files" block
  272. \IV0+A[\zs\bl[end]]                \\ If "A" go to "Shell" block
  273. \eb
  274.  
  275. |edit
  276. \dc-[%WC %S:%VS.bsc]
  277. \bl[end]\eb
  278. \ab
  279.  
  280. |delete
  281. \dc-[del %S:%VS.bsc]
  282. \eb
  283.  
  284. |append1
  285. \AF%S:%VS.bsc["\DM[CONNECTED TO "%SN"]                     "\"\ System display message    ]
  286. \AF%S:%VS.bsc["\to[40"]"\pl                                "\"\ Set timer                 ]
  287. \AF%S:%VS.bsc["\"\CA-["\eb"]                                "\"\ Check carrier currently off]
  288.  
  289.  
  290. |append
  291. \AF%S:%VS.bsc["\SV0["%SN"]           "\"\ set existing system number to "%v0                    ]
  292. \AF%S:%VS.bsc["\sv1[%v1"]    "\"\ Report packet name]
  293. \AF%S:%VS.bsc["\SV2[%v2"]            "\"\ enter door number [#"]      ]
  294. \AF%S:%VS.bsc["\sv4[%v4"]    "\"\ Mail Packet name]
  295. \AF%S:%VS.bsc["\SV5[            "]  "\"\ Name of file to UpLoad]
  296. \AF%S:%VS.bsc["\SV6[                                        "]"\"\ file description]
  297. \AF%S:%VS.bsc["\SV7[                                        "]"\"\ file description]
  298. \AF%S:%VS.bsc["\SV8[                                        "]"\"\ file description]
  299. \AF%S:%VS.bsc["\SV9[          "]    "\"\ enter file name to download]
  300.  
  301. \zs
  302.  
  303. \dm12,10[ ╔═══════════════════════════════════════╗ ]
  304. \dm12,11[ ║ How many mail packets do you wish to  ║ ]
  305. \dm12,12[ ║  save on your disk for this system    ║ ]
  306. \dm12,13[ ║        Enter  1- 9                    ║ ]
  307. \dm12,14[ ╚═══════════════════════════════════════╝ ]
  308. {
  309. \KV0[Enter number of packets> ]\AF%S:%VS.bsc["\SVB[%V0"]             "\"\ enter number of qwk's to keep
  310.  
  311. \dm14,11[ ╔═══════════════════════════════════════╗ ]
  312. \dm14,12[ ║ Do you want to scan All directories   ║ ]
  313. \dm14,13[ ║  for new files or just the Upload     ║ ]
  314. \dm14,14[ ║ Enter <U>pload or <A>ll               ║ ]
  315. \dm14,15[ ╚═══════════════════════════════════════╝ ]
  316. {
  317. \KV0[Enter U or A > ] \AF%S:%VS.bsc["\SVC[%v0"]             "\"\ scanning directories for files A all or U uploads]
  318. \SVC[%V0]
  319.  
  320. |append4
  321. \AF%S:%VS.bsc["\CA+["\SC[SCRIPT;mail"]"]                    "\"\ Mail block ]
  322. \AF%S:%VS.bsc["\ie+"%VA,X["\gs[script;calback"]"\eb"]         "\"\ Checking for errors ]
  323. \AF%S:%VS.bsc["\CA+["\FE+"%u:"%V1["\SC[SCRIPT;%VMul"]"]"]        "\"\ Upload block]
  324. \AF%S:%VS.bsc["\ie+"%VA,X["\gs[script;calback"]"\eb"]         "\"\ Checking for errors ]
  325. \AF%S:%VS.bsc["\CA+["\SC[SCRIPT;%VMdl"]                     "\"\ Mail download ]
  326. \AF%S:%VS.bsc["\ie+"%VA,X["\gs[script;calback"]"\eb"]         "\"\ Checking for errors ]
  327. \AF%S:%VS.bsc["\CA+["\SC[SCRIPT;FILES"]"]                   "\"\ Scan for new files block]
  328. \AF%S:%VS.bsc[                                                                           ]
  329. \AF%S:%VS.bsc["\"\CA+["\FE+"%U:"%V5["\SC[SCRIPT;upload"]"]"]     "\"\when doing upload or download remove]
  330. \AF%S:%VS.bsc["\"\CA+["\FE-"%D:"%V9["\SC[SCRIPT;download"]"]"]   "\"\slash from beginning of line]
  331. \AF%S:%VS.bsc[                                                                           ]
  332. \AF%S:%VS.bsc["\CA-["\AB"]"\CA+["\gs[SCRIPT;Logoff"]"]         "\"\ Log off block ]
  333. \AF%S:%VS.bsc["\ab]
  334. \AF%S:%VS.bsc[]
  335. \AF%S:%VS.bsc["|*TAB             "\"\ This runs automatically when <Tab> pressed       ]
  336. \AF%S:%VS.bsc["\SV0[1"] "\KS                                                           ]
  337. \AF%S:%VS.bsc["\DM38,"%V0[ ╔═══════════════════════════════════════╗ "]"\+V0"[1"]]
  338. \AF%S:%VS.bsc["\DM38,"%V0[  ║ OnLine MENU    "%HR:"%MI  "%Mo/"%DA/"%YR        ║ "]"\+V0[1"]]
  339. \AF%S:%VS.bsc["\DM38,"%V0"[ ╠═══════════════════════════════════════╣ "]  "\+V0"[1"]]
  340. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <C> = find main Command               ║ "]  "\+V0"[1"]]
  341. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <D> = Download a file                 ║ "]  "\+V0"[1"]]
  342. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <DM>= Download Mail (from mail door)  ║ "]  "\+V0"[1"]]
  343. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <E> = Edit Script                     ║ "]  "\+V0"[1"]]
  344. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <F> = File Manager                    ║ "]  "\+V0"[1"]]
  345. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <G> = Goodbye                         ║ "]  "\+V0"[1"]]
  346. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <J> = Jump to DOS                     ║ "]  "\+V0"[1"]]
  347. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <L> = Log to disk ...status "%LD       ║ "]  "\+V0"[1"]]
  348. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <M> = Mail (check for your mail)      ║ "]  "\+V0"[1"]]
  349. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <N> = New File Scan                   ║ "]  "\+V0"[1"]]
  350. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <O> = Open Door                       ║ "]  "\+V0"[1"]]
  351. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <P> = edit Phone directory            ║ "]  "\+V0"[1"]]
  352. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <Q> = Quick Note file                 ║ "]  "\+V0"[1"]]
  353. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <S> = Scroll-back buffer              ║ "]  "\+V0"[1"]]
  354. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <T> = Termanial Mode                  ║ "]  "\+V0"[1"]]
  355. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <U> = Upload a file                   ║ "]  "\+V0"[1"]]
  356. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <UM>= Upload Mail (from mail door)    ║ "]  "\+V0"[1"]]
  357. \AF%S:%VS.bsc["\DM38,"%V0"[ ╟───────────────────────────────────────╢ "]  "\+V0"[1"]]
  358. \AF%S:%VS.bsc["\DM38,"%V0"[ ║ <R> = RESUME Script  <?> Manual Macro ║ "]  "\+V0"[1"]]
  359. \AF%S:%VS.bsc["\DM38,"%V0"[ ║<Esc>= ABORT script   <V>iew Settings  ║ "]  "\+V0"[1"]]
  360. \AF%S:%VS.bsc["\DM38,"%V0"[ ╚═══════════════════════════════════════╝ "]]
  361. \AF%S:%VS.bsc["\KO"[30"]  "\BB+  "\KV0__"[Enter OPTION: "]  "\BB-  "\RS ]
  362. \AF%S:%VS.bsc["\IV0+C"["\SVQ["]"\SC[SCRIPT;quest"]"\gb"[termlines"]"]  ]
  363. \AF%S:%VS.bsc["\IV0+DM"["\SVG["]"\SC[SCRIPT;%VMdl"]"]                  ]
  364. \AF%S:%VS.bsc["\IV0+D"["\SVD["]"\SC[SCRIPT;Download"]"]                ]
  365. \AF%S:%VS.bsc["\IV0+E"["\DC-"["%WC "%S:"%VY"]"\gb"[*tab"]"]            ]
  366. \AF%S:%VS.bsc["\IV0+F"["\FM"["]"\gb"[*tab"]"]                          ]
  367. \AF%S:%VS.bsc["\IV0+G"["\SC[SCRIPT;logoff"]"\AB"]                      ]
  368. \AF%S:%VS.bsc["\IV0+J"["\JD"\gb"[*tab"]"]                              ]
  369. \AF%S:%VS.bsc["\IV0+L"["\LD*"\gb"[*tab"]"]                             ]
  370. \AF%S:%VS.bsc["\IV0+M"[R Y"{"\GB"[termlines"]"]                        ]
  371. \AF%S:%VS.bsc["\IV0+?"["\KV9"[MACRO:"] @V9  "\LV9"["]  "\IE+"%LV,1"["\SV9"["%V9"]"]"\gb"[*tab"]"] ]
  372. \AF%S:%VS.bsc["\IV0+N"["\SVF["]N S %VC N"{"\GB"[termlines"]"]          ]
  373. \AF%S:%VS.bsc["\IV0+O"["\SVM["]op "%V2 "{"\GB"[termlines"]"]           ]
  374. \AF%S:%VS.bsc["\IV0+P"[ "\DI"["] "\GB"[*Tab"] "]                       ]
  375. \AF%S:%VS.bsc["\IV0+Q"["\DC-["%WC "%B:notes.txt"]"]                    ]
  376. \AF%S:%VS.bsc["\IV0+R"["\gs["%Vy;menu"]"]                              ]
  377. \AF%S:%VS.bsc["\IV0+S"["\RB"\gb"[*Tab"]"]                              ]
  378. \AF%S:%VS.bsc["\IV0+T"["\gb"[termlines"]"\gb"[*tab"]"]                 ]
  379. \AF%S:%VS.bsc["\IV0+UM"["\SVS["]"\SC[SCRIPT;%VMul"]"\gb"[*tab"]"]      ]
  380. \AF%S:%VS.bsc["\IV0+U"["\SVU["]"\SC[SCRIPT;upload"]"\gb"[*tab"]"]      ]
  381. \AF%S:%VS.bsc["\IV0+V"["\SVU["]"\SC[SCRIPT;settings"]"\gb"[*tab"]"]    ]
  382. \AF%S:%VS.bsc["\GB"[*TAB"]                                             ]
  383. \AF%S:%VS.bsc[                                                         ]
  384. \AF%S:%VS.bsc[|TermLines                                               ]
  385. \AF%S:%VS.bsc["\to"[120"]                                              ]
  386. \AF%S:%VS.bsc["\ST"[ » Press <TAB> for Menu options «"]                ]
  387. \AF%S:%VS.bsc["\RE"["\CA-"["\ab"] "\IK+"["%IK"]"]                      ]
  388. \AF%S:%VS.bsc[                                                         ]
  389.  
  390. |end
  391. \zs
  392. \bl[time]
  393. \bl[timeEdit]
  394. \svp[%V0:%Mi]\lvp[5]
  395. \svo[%Mo"/%Da]\lvo[5]
  396. \dm20,14[ ╔═══════════════════════════════════╗ ]
  397. \dm20,15[ ║       %Vt Script         ║ ]
  398. \dm20,16[ ║                                   ║ ]
  399. \dm20,17[ ║      Completed  at %Vp  %v1     ║ ]
  400. \dm20,18[ ║        on %Vo                   ║ ]
  401. \dm20,19[ ║                                   ║ ]
  402. \dm20,20[ ╚═══════════════════════════════════╝ ]
  403. \svb[]\ko[]
  404. \\zs
  405. \ab
  406.  
  407. |Time                             \\ 12 hr clock
  408. \SV0[%Hr]\eb
  409.  
  410. |timeEdit
  411. \IE+%V0,0 `[\bl[AM]\eb]
  412. \IE+%V0,10[\bl[AM1]\eb]
  413. \IE+%V0,11[\bl[AM1]\eb]
  414. \IE+%V0,12[\bl[PM1]\eb]
  415. \IE+%V0,13[\+V0[-12]\bl[PM]\eb]
  416. \IE+%V0,14[\+V0[-12]\bl[PM]\eb]
  417. \IE+%V0,15[\+V0[-12]\bl[PM]\eb]
  418. \IE+%V0,16[\+V0[-12]\bl[PM]\eb]
  419. \IE+%V0,17[\+V0[-12]\bl[PM]\eb]
  420. \IE+%V0,18[\+V0[-12]\bl[PM]\eb]
  421. \IE+%V0,19[\+V0[-12]\bl[PM]\eb]
  422. \IE+%V0,20[\+V0[-12]\bl[PM]\eb]
  423. \IE+%V0,21[\+V0[-12]\bl[PM]\eb]
  424. \IE+%V0,22[\+V0[-12]\bl[PM1]\eb]
  425. \IE+%V0,23[\+V0[-12]\bl[PM1]\eb]
  426. \IE-%V0,abc[\bl[AM]\eb]
  427. \eb
  428.  
  429. |AM
  430. \SV1[AM`]\eb
  431. \eb
  432.  
  433. |AM1
  434. \SV1[AM]\eb
  435. \eb
  436.  
  437. |PM
  438. \SV1[PM `]\eb
  439. \eb
  440.  
  441. |PM1
  442. \SV1[PM`]\eb
  443. \eb                                           \\ timer blocks
  444.